1 REM COPYRIGHT 1993 - COMPUTE PUBLICATIONS INTL LTD - ALL RIGHTS RESERVED
2 POKE53280,6:POKE53281,6:PRINT"[147]"
5 PRINT"WAIT 60 SECONDS...":PRINT"CREATING MEMORY MONITOR"
10 FORI=51205 TO 51338:READ A:CK=CK+A:POKEI,A:NEXT
20 IFCK<>16246THENPRINT"ERROR IN DATA STATEMENTS":END
30 FORN=0TO255:J$=RIGHT$("00000"+MID$(STR$(256*N),2),5):FORK=1TO5
40 POKE48896+256*K+N,ASC(MID$(J$,K,1)):NEXT:NEXT
50 FORN=0TO255:J$=RIGHT$("000"+MID$(STR$(N),2),3):FORK=1TO3
60 POKE50176+256*K+N,VAL(MID$(J$,K,1)):NEXT:NEXT:OPEN8,8,8,"MEMORY MONITOR"
70 POKE250,0:POKE251,192:POKE780,250:POKE781,138:POKE782,200:SYS65496
80 DATA 120,169,18,141,20,3,169,200,141,21,3,88,96,56,165,51,229,49,133,251,165
90 DATA 52,229,50,168,185,0,192,141,0,200,185,0,193,141,1,200,185,0,194,141,2
100 DATA 200,185,0,195,141,3,200,185,0,196,141,4,200,24,164,251,185,0,197,109,2
110 DATA 200,141,2,200,185,0,198,109,3,200,141,3,200,185,0,199,109,4,200,141,4
120 DATA 200,160,5,162,0,134,252,162,0,185,255,199,24,101,252,201,58,144,4,24
130 DATA 105,246,232,153,255,3,169,1,153,255,215,136,208,227,76,49,234,120,169
140 DATA 49,141,20,3,169,234,141,21,3,88,96
150 PRINT"ACTIVATE MEMORY MONITOR WITH SYS 51205"